object fmProductManage: TfmProductManage
  Left = 0
  Top = 0
  Caption = #20135#21697#36164#26009
  ClientHeight = 565
  ClientWidth = 797
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Visible = True
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 191
    Height = 565
    Align = alLeft
    BevelOuter = bvNone
    TabOrder = 0
    object vstProductClass: TVirtualStringTree
      Left = 0
      Top = 26
      Width = 191
      Height = 539
      Align = alClient
      Header.AutoSizeIndex = 0
      Header.Font.Charset = DEFAULT_CHARSET
      Header.Font.Color = clWindowText
      Header.Font.Height = -11
      Header.Font.Name = 'Tahoma'
      Header.Font.Style = []
      Header.MainColumn = -1
      Header.Options = [hoColumnResize, hoDrag]
      Images = dmImages.ilMain
      PopupMenu = PopupMenu1
      TabOrder = 0
      OnFocusChanged = vstProductClassFocusChanged
      OnGetText = vstProductClassGetText
      OnGetImageIndex = vstProductClassGetImageIndex
      Columns = <>
    end
    object dkTopLeft: TdxBarDockControl
      Left = 0
      Top = 0
      Width = 191
      Height = 26
      Align = dalTop
      BarManager = dxBarManager1
    end
  end
  object cxSplitter1: TcxSplitter
    Left = 191
    Top = 0
    Width = 8
    Height = 565
    HotZoneClassName = 'TcxXPTaskBarStyle'
    HotZone.SizePercent = 50
    Control = Panel1
  end
  object grdBrowser: TcxGrid
    Left = 199
    Top = 0
    Width = 598
    Height = 565
    Align = alClient
    TabOrder = 6
    LookAndFeel.Kind = lfOffice11
    object tvBrowser: TcxGridDBTableView
      OnDblClick = tvBrowserDblClick
      NavigatorButtons.ConfirmDelete = False
      DataController.DataSource = dsBrowser
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <>
      DataController.Summary.SummaryGroups = <>
      OptionsSelection.CellSelect = False
      OptionsView.GroupByBox = False
      object tvBrowserbpi_id: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_id'
        Visible = False
        Width = 107
      end
      object tvBrowserbpi_cid: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_cid'
        Visible = False
      end
      object tvBrowserbpi_internalpno: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_internalpno'
        Width = 119
      end
      object tvBrowserbpi_internalpno2: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_internalpno2'
        Width = 107
      end
      object tvBrowserbpi_customerpno: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_customerpno'
      end
      object tvBrowserbpi_material: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_material'
      end
      object tvBrowserbpi_simpname: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_simpname'
      end
      object tvBrowserbpi_cnname: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_cnname'
      end
      object tvBrowserbpi_enname: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_enname'
      end
      object tvBrowserbpi_property: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_property'
      end
      object tvBrowserbpi_level: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_level'
      end
      object tvBrowserbpi_gw: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_gw'
      end
      object tvBrowserbpi_nw: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_nw'
      end
      object tvBrowserbpi_materialprice: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_materialprice'
      end
      object tvBrowserbpi_processcost: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_processcost'
      end
      object tvBrowserbpi_buyprice: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_buyprice'
      end
      object tvBrowserbpi_sellprice: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_sellprice'
      end
      object tvBrowserbpi_selllowestprice: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_selllowestprice'
      end
      object tvBrowserbpi_priceadjustdate: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_priceadjustdate'
      end
      object tvBrowserbpi_patterncharge: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_patterncharge'
      end
      object tvBrowserbpi_jigcharge: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_jigcharge'
      end
      object tvBrowserbpi_materialcn: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_materialcn'
      end
      object tvBrowserbpi_materialen: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_materialen'
      end
      object tvBrowserbpi_surfacingcn: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_surfacingcn'
      end
      object tvBrowserbpi_surfacingen: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_surfacingen'
      end
      object tvBrowserbpi_rigidityrange: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_rigidityrange'
      end
      object tvBrowserbpi_mainfactoryid: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_mainfactoryid'
      end
      object tvBrowserbpi_isprivate: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_isprivate'
      end
      object tvBrowserbpi_customerid: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_customerid'
      end
      object tvBrowserbpi_drawingversion: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_drawingversion'
      end
      object tvBrowserbpi_patternno: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_patternno'
      end
      object tvBrowserbpi_desc: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_desc'
      end
      object tvBrowserbpi_pictureid: TcxGridDBColumn
        DataBinding.FieldName = 'bpi_pictureid'
      end
    end
    object lvBrowser: TcxGridLevel
      GridView = tvBrowser
    end
  end
  object dxBarManager1: TdxBarManager
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    Categories.Strings = (
      'Default')
    Categories.ItemsVisibles = (
      2)
    Categories.Visibles = (
      True)
    ImageOptions.Images = dmImages.ilMain
    LookAndFeel.Kind = lfOffice11
    LookAndFeel.NativeStyle = True
    PopupMenuLinks = <>
    Style = bmsUseLookAndFeel
    UseSystemFont = True
    Left = 320
    Top = 188
    DockControlHeights = (
      0
      0
      0
      0)
    object dxBarManager1Bar1: TdxBar
      Caption = 'Custom 1'
      CaptionButtons = <>
      DockControl = dkTopLeft
      DockedDockControl = dkTopLeft
      DockedLeft = 0
      DockedTop = 0
      FloatLeft = 808
      FloatTop = 8
      FloatClientWidth = 0
      FloatClientHeight = 0
      ItemLinks = <
        item
          Visible = True
          ItemName = 'bbtnNewClass'
        end
        item
          Visible = True
          ItemName = 'bbtnEditClass'
        end
        item
          Visible = True
          ItemName = 'bbtnDeleteClass'
        end>
      OneOnRow = True
      Row = 0
      UseOwnFont = False
      Visible = True
      WholeRow = False
    end
    object bbtnNewClass: TdxBarButton
      Caption = #26032#22686
      Category = 0
      Hint = #26032#22686
      Visible = ivAlways
      ButtonStyle = bsDropDown
      DropDownMenu = dxBarPopupMenu1
      ImageIndex = 219
      PaintStyle = psCaptionGlyph
      OnClick = bbtnNewClassClick
    end
    object bbtnDeleteClass: TdxBarButton
      Caption = #21024#38500
      Category = 0
      Hint = #21024#38500
      Visible = ivAlways
      ImageIndex = 220
      PaintStyle = psCaptionGlyph
      OnClick = bbtnDeleteClassClick
    end
    object bbtnEditClass: TdxBarButton
      Caption = #32534#36753
      Category = 0
      Hint = #32534#36753
      Visible = ivAlways
      ImageIndex = 221
      PaintStyle = psCaptionGlyph
      OnClick = bbtnEditClassClick
    end
    object bbtnNewSubClass: TdxBarButton
      Caption = #22312#24403#21069#20301#32622#26032#22686#23376#31867
      Category = 0
      Hint = #22312#24403#21069#20301#32622#26032#22686#23376#31867
      Visible = ivAlways
      ImageIndex = 219
      OnClick = bbtnNewSubClassClick
    end
  end
  object dsBrowser: TDADataSource
    DataSet = tblBrowser.Dataset
    DataTable = tblBrowser
    Left = 326
    Top = 332
  end
  object tblLeft: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    IndexDefs = <>
    Left = 60
    Top = 204
  end
  object PopupMenu1: TPopupMenu
    Left = 108
    Top = 336
  end
  object dxBarPopupMenu1: TdxBarPopupMenu
    BarManager = dxBarManager1
    ItemLinks = <
      item
        Visible = True
        ItemName = 'bbtnNewSubClass'
      end>
    UseOwnFont = False
    Left = 86
    Top = 142
  end
  object qry: TADOQuery
    ConnectionString = 
      'Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initi' +
      'al Catalog=sofit_system;Data Source=BATI'
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT '
      '    bpi_id, bpi_cid, bpi_internalpno, bpi_internalpno2, '
      '    bpi_customerpno, bpi_material, bpi_simpname, bpi_cnname, '
      '    bpi_enname, bpi_property, bpi_level, bpi_gw, bpi_nw, '
      
        '    bpi_materialprice, bpi_processcost, bpi_buyprice, bpi_sellpr' +
        'ice, '
      
        '    bpi_selllowestprice, bpi_priceadjustdate, bpi_patterncharge,' +
        ' '
      
        '    bpi_jigcharge, bpi_materialcn, bpi_materialen, bpi_surfacing' +
        'cn, '
      '    bpi_surfacingen, bpi_rigidityrange, bpi_mainfactoryid, '
      '    bpi_isprivate, bpi_customerid, bpi_drawingversion, '
      '    bpi_patternno, bpi_name, bpi_desc, bpi_pictureid'
      '  FROM'
      '    b_productinfo')
    Left = 374
    Top = 300
    object qrybpi_id: TGuidField
      FieldName = 'bpi_id'
      FixedChar = True
      Size = 38
    end
    object qrybpi_cid: TGuidField
      FieldName = 'bpi_cid'
      FixedChar = True
      Size = 38
    end
    object qrybpi_internalpno: TStringField
      FieldName = 'bpi_internalpno'
      Size = 30
    end
    object qrybpi_internalpno2: TStringField
      FieldName = 'bpi_internalpno2'
      Size = 30
    end
    object qrybpi_customerpno: TStringField
      FieldName = 'bpi_customerpno'
      Size = 30
    end
    object qrybpi_material: TStringField
      FieldName = 'bpi_material'
      Size = 30
    end
    object qrybpi_simpname: TStringField
      FieldName = 'bpi_simpname'
      Size = 30
    end
    object qrybpi_cnname: TStringField
      FieldName = 'bpi_cnname'
      Size = 30
    end
    object qrybpi_enname: TStringField
      FieldName = 'bpi_enname'
      Size = 30
    end
    object qrybpi_property: TStringField
      FieldName = 'bpi_property'
      Size = 30
    end
    object qrybpi_level: TStringField
      FieldName = 'bpi_level'
      Size = 30
    end
    object qrybpi_gw: TFloatField
      FieldName = 'bpi_gw'
    end
    object qrybpi_nw: TFloatField
      FieldName = 'bpi_nw'
    end
    object qrybpi_materialprice: TFloatField
      FieldName = 'bpi_materialprice'
    end
    object qrybpi_processcost: TFloatField
      FieldName = 'bpi_processcost'
    end
    object qrybpi_buyprice: TFloatField
      FieldName = 'bpi_buyprice'
    end
    object qrybpi_sellprice: TFloatField
      FieldName = 'bpi_sellprice'
    end
    object qrybpi_selllowestprice: TFloatField
      FieldName = 'bpi_selllowestprice'
    end
    object qrybpi_priceadjustdate: TDateTimeField
      FieldName = 'bpi_priceadjustdate'
    end
    object qrybpi_patterncharge: TFloatField
      FieldName = 'bpi_patterncharge'
    end
    object qrybpi_jigcharge: TFloatField
      FieldName = 'bpi_jigcharge'
    end
    object qrybpi_materialcn: TStringField
      FieldName = 'bpi_materialcn'
      Size = 30
    end
    object qrybpi_materialen: TStringField
      FieldName = 'bpi_materialen'
      Size = 30
    end
    object qrybpi_surfacingcn: TStringField
      FieldName = 'bpi_surfacingcn'
      Size = 30
    end
    object qrybpi_surfacingen: TStringField
      FieldName = 'bpi_surfacingen'
      Size = 30
    end
    object qrybpi_rigidityrange: TStringField
      FieldName = 'bpi_rigidityrange'
      Size = 30
    end
    object qrybpi_mainfactoryid: TGuidField
      FieldName = 'bpi_mainfactoryid'
      FixedChar = True
      Size = 38
    end
    object qrybpi_isprivate: TBooleanField
      FieldName = 'bpi_isprivate'
    end
    object qrybpi_customerid: TGuidField
      FieldName = 'bpi_customerid'
      FixedChar = True
      Size = 38
    end
    object qrybpi_drawingversion: TStringField
      FieldName = 'bpi_drawingversion'
      Size = 10
    end
    object qrybpi_patternno: TStringField
      FieldName = 'bpi_patternno'
      Size = 30
    end
    object qrybpi_desc: TStringField
      FieldName = 'bpi_desc'
      Size = 120
    end
    object qrybpi_pictureid: TGuidField
      FieldName = 'bpi_pictureid'
      FixedChar = True
      Size = 38
    end
  end
  object ds: TDataSource
    DataSet = qry
    Left = 374
    Top = 332
  end
  object tblBrowser: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'bpi_id'
        DataType = datGuid
        Required = True
        InPrimaryKey = True
      end
      item
        Name = 'bpi_cid'
        DataType = datGuid
        Required = True
      end
      item
        Name = 'bpi_internalpno'
        DataType = datString
        Size = 30
        Required = True
      end
      item
        Name = 'bpi_internalpno2'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bpi_customerpno'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bpi_material'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bpi_simpname'
        DataType = datString
        Size = 30
        Required = True
      end
      item
        Name = 'bpi_cnname'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bpi_enname'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bpi_property'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bpi_level'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bpi_gw'
        DataType = datFloat
      end
      item
        Name = 'bpi_nw'
        DataType = datFloat
      end
      item
        Name = 'bpi_materialprice'
        DataType = datFloat
      end
      item
        Name = 'bpi_materialprice2'
        DataType = datFloat
      end
      item
        Name = 'bpi_processcost'
        DataType = datFloat
      end
      item
        Name = 'bpi_processcost2'
        DataType = datFloat
      end
      item
        Name = 'bpi_buyprice'
        DataType = datFloat
      end
      item
        Name = 'bpi_sellprice'
        DataType = datFloat
      end
      item
        Name = 'bpi_selllowestprice'
        DataType = datFloat
      end
      item
        Name = 'bpi_priceadjustdate'
        DataType = datDateTime
      end
      item
        Name = 'bpi_patterncharge'
        DataType = datFloat
      end
      item
        Name = 'bpi_patterncharge2'
        DataType = datFloat
      end
      item
        Name = 'bpi_jigcharge'
        DataType = datFloat
      end
      item
        Name = 'bpi_jigcharge2'
        DataType = datFloat
      end
      item
        Name = 'bpi_materialcn'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bpi_materialen'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bpi_surfacingcn'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bpi_surfacingen'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bpi_rigidityrange'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bpi_mainfactoryid'
        DataType = datGuid
      end
      item
        Name = 'bpi_isprivate'
        DataType = datBoolean
      end
      item
        Name = 'bpi_customerid'
        DataType = datGuid
      end
      item
        Name = 'bpi_drawingversion'
        DataType = datString
        Size = 10
      end
      item
        Name = 'bpi_patternno'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bpi_desc'
        DataType = datString
        Size = 120
      end
      item
        Name = 'bpi_pictureid'
        DataType = datGuid
      end
      item
        Name = 'bpi_currency'
        DataType = datString
        Size = 10
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = ClientDataModule.RemoteDataAdapter
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'b_productinfo'
    IndexDefs = <>
    Left = 326
    Top = 298
  end
end
